home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP Şubat 1998.iso / drivers / YAZICI / FUJITSU / MARKVIS / 14ADVMV1.EXE / FJMV.LI_ / FJMV.LI
Encoding:
INI File  |  1997-02-03  |  27.3 KB  |  861 lines

  1. [Variables]
  2. ;
  3. ; System variables...
  4. ;
  5. $DEBUG = $NO
  6.  
  7. $APPDIR = ""
  8. $DLLDIR_INSTALLING = ""
  9. $DLLDIR_EXISTING = ""
  10. $INSTALLMETHODS = "ECS"
  11. $INSTALLMACRO = "InstallRemoteMarkVision"
  12. $DRIVERMACRO = "InstRemoteMVFromMV"
  13. $SIZECOMPONENT = "MarkVision"
  14.  
  15. ;
  16. ; Switches that toggle installation of the different components.
  17. ; Network administrators may override these in an extra config file
  18. ; to tailor for their own environment.
  19. ;
  20. $Install_MarkVision = $YES
  21. $InstallMSVC = $YES
  22. $Install_MarkVisionWaves = $YES
  23. $Install_MarkVisionUninstall = $YES
  24. $Install_MarkVisionLLNet = $NO
  25. $Install_PostScriptDriver = $YES 
  26. $Install_PCLDriver = $YES
  27. $Install_MarkVisionIPX = $NO
  28. $Install_MarkVisionNetWare = $NO
  29. $Install_MarkVisionTCPIP = $NO
  30. $Install_MarkVisionP2PClient = $YES
  31. $Install_MarkVisionP2PServer = $YES
  32. $UnInstaller = ""
  33. $Install_ProgmanGroup = $YES
  34. $Install_StartupGroup = ""
  35. $Install_AdditionalDrivers = ""
  36. $Install_Driver = ""
  37. $Install_RemoteMV = $NO
  38. $DoMarkVisionReally = $Yes
  39. $Install_Fuji = $YES
  40. $REG_SAMEDLL = $YES
  41. $Str_Blank = ""
  42. $InstallAggDll=$YES
  43. ; INI files
  44. ;
  45. $LexpanelINI = $APPDIR
  46.  
  47. ;
  48. ; Other globals...
  49. ;
  50. $RemoteMarkVisionDir = ""   ; $SERVERDIR + $DirName_RemoteMV
  51. $StripFilename_Drive = ""
  52.  
  53.  
  54. ;
  55. ; String constants
  56. ;
  57. $Exe_MarkVision = "markvis.exe"
  58. $Uninst_MarkVision = "delmarkv.exe"
  59. $DirName_RemoteMV = "Win95"
  60.  
  61. $Str_INI_Updated = "updated"
  62.  
  63.  
  64.  
  65. ;
  66. ; Temporary strings
  67. ;
  68. $TempString = ""
  69. $TempAppDir = ""
  70. $TempServerAppDir = ""
  71. $ExecutablePath = ""
  72.  
  73. $REG_START = "\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run"
  74. $REG_PATH = $APPDIR
  75. $REG_VALUE = ""
  76. $REG_VALUE_NAME = ""
  77. $REG_UNINSTALL = "\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Uninstall\\MarkVision"
  78. $REG_KEY = ""
  79.  
  80. [Disks]
  81. Disk1 = $Str_Disk_1, disk.bmp, "..\\w95setup" ,255, 0, 0
  82. Disk2 = $Str_Disk_2, disk.bmp, "..\\w95drv" ,255, 0, 0
  83. Disk3 = $Str_Disk_3, disk.bmp, "..\\w95mv1" ,255, 0, 0
  84. Disk4 = $Str_Disk_4, disk.bmp, "..\\w95mv2" ,255, 0, 0
  85.  
  86.  
  87. [Libraries]
  88. MVUtility = linutil.dll
  89. MVShellExt = shellext.dll
  90.  
  91. ; This is left here as an example of a Banners Section
  92. ;[Banners]
  93. ;MarkVisionBanner = markvisn.bmp
  94. ;RegCardBanner = RegCard.bmp
  95.  
  96.  
  97.  
  98. [Components]
  99. ; Normal installation components -- for remotely runnable MarkVision,
  100. ; $APPDIR will be $RemoteMarkVisionDir
  101.  
  102.  
  103. Msvc = $Str_Msvc, , $TRUESYSTEMDIR, Disk1, 1248528,
  104.                 (msvcrt.dl_, mfc42.dl_)
  105.  
  106. ServerMsvc = $Str_Msvc, , $SERVERDIR, Disk1, 723269,
  107.                 (msvcrt.dl_, mfc42.dl_)
  108.  
  109. LanguageMonitorNC = $Str_LanguageMonitor, , $TRUESYSTEMDIR, Disk1, 252416,
  110.                  (=lexbce.dl_, =lexstart.ex_, =lexbcelm.dl_, =lexlmpm.dl_)
  111.  
  112. RemoteMV_Misc_Server = $Str_MarkVision_Remote, , $RemoteMarkVisionDir, Disk1, 212666,
  113.                         (fjmri.lin, fjmv.lin,  linutil.dll, shellext.dll,
  114.                                 help.lin, fjregs.lin, fj.lin, prtport.lin,
  115.                                 prntpart.bmp, cmdline.rsp, readme.txt
  116.                         )
  117.  
  118. RemoteMV_Server = "", , , , 1, (RemoteMV_Misc_Server)
  119.  
  120. LanguageMonitor = $Str_LanguageMonitor, , $TRUESYSTEMDIR, Disk1, 252416,
  121.                  (lexbce.dl_, lexstart.ex_, lexbcelm.dl_, lexlmpm.dl_)
  122.  
  123.  
  124. ServerPS = $Str_PostScriptDriver, , $SERVERDIR, Disk2, 1047343,
  125.                 (lexpsext.dl_, lexpslng.dl_,  lexps.hl_, lexps.cn_,
  126.                 ptapiw16.dl_, lexmv95r.dl_,lexmv95.dl_,  
  127.                 ps4079.ic_, lexps.dr_, lexps.av_, readmeps.txt,
  128.                 drvnpa95.dl_, npad95.dl_, lexmv95.hl_
  129.                 )
  130.  
  131.  
  132.  
  133. ServerPCL = $Str_PCLDriver, ,$SERVERDIR, Disk2, 408788,
  134.                 (fjppvav.dr_, readmest.txt, iconlib.dll, unidrv.dll, unidrv.hlp)
  135.  
  136.  
  137.  
  138.  
  139. ServerMarkVisionBCE = $Str_MarkVision, , $SERVERDIR, Disk2, 84684,
  140.                         (lexbce.dl_, lexstart.ex_)
  141.  
  142.  
  143.  
  144. AggDll = $Str_MarkVision, , $APPDIR, Disk3, 384000,
  145.                         (agguidll.dl_, lexmv95.hl_)
  146.  
  147.  
  148. MarkVision = $Str_MarkVision, , $APPDIR, Disk3, 1171025,
  149.                         (markvis.ex_, mvprtobj.dl_,
  150.                         agprtgui.dl_, mvguidll.dl_,
  151.                         mvresdll.dl_, printree.dl_, mvprtmgr.dl_,
  152.                         mvpo_wri.dl_,
  153.                         verify.tx_,
  154.                         mvprm.dl_
  155.                         )
  156.  
  157. ;TODO HELP - when Fujitsu help is ready, uncomment this component
  158. ;             the file size needs to be updated, 
  159. ;             the disk may not be correct, and the string may need changed,
  160. ;             files may have been added or changed.
  161. MarkVisionHelp = $Str_MarkVision, , $APPDIR, Disk3, 223929,
  162.                 (Fj_markv.hl_, Fj_markv.cn_, FJ_P_INV.hl_, Fj_phnum.hl_)
  163.  
  164.  
  165.  
  166.  
  167. MvPrtGuiDLL = $Str_MarkVision, , $APPDIR, Disk3, 304640,
  168.                         ( mvprtgui.dll )
  169.         
  170. ServerMvPrtGuiDLL = $Str_MarkVision, , $SERVERDIR, Disk3, 304640,
  171.                         ( mvprtgui.dll )
  172.  
  173. ServerMarkVision = $Str_MarkVision, , $SERVERDIR, Disk3, 600044,
  174.                         (markvis.ex_, mvprtobj.dl_,
  175.                         agguidll.dl_, agprtgui.dl_, mvguidll.dl_,
  176.                         mvresdll.dl_, printree.dl_, mvprtmgr.dl_,
  177.                         mvpo_wri.dl_,
  178.                         verify.tx_, lexp2p32.dl_, lexpps.ex_,
  179.                         mvprm.dl_ )
  180.  
  181. ;TODO HELP - when Fujitsu help is ready, uncomment this component
  182. ;              the file size needs to be updated, 
  183. ;             the disk may not be correct, and the string may need changed,
  184. ;             files may have been added or changed.
  185. ServerMarkVisionHelp = $Str_MarkVision, , $SERVERDIR, Disk3, 85113,
  186.                 (Fj_markv.hl_, lexmv95.hl_, Fj_markv.cn_, FJ_P_INV.hl_, Fj_phnum.hl_)
  187.  
  188.  
  189.  
  190. FujiMarkVision = $Str_MarkVision, , $APPDIR, Disk3, 1403904,
  191.                         (mvpofuji.dl_, fjprtgui.dl_, fjguidll.dl_)
  192.  
  193. FujiServerMarkVision = $Str_MarkVision, , $SERVERDIR, Disk3, 228182,
  194.                         (mvpofuji.dl_, fjprtgui.dl_, fjguidll.dl_)
  195.  
  196. MarkVisionP2PClient = $Str_MarkVisionP2PClient, , $TRUESYSTEMDIR, Disk3, 62464,
  197.                  (lexp2p32.dl_)
  198.  
  199. MarkVisionP2PServer = $Str_MarkVisionP2PServer, , $TRUESYSTEMDIR, Disk3, 31232,
  200.                  (lexpps.ex_)
  201.  
  202. ServerMVUninstall = $Str_MarkVisionUninstall, , $SERVERDIR,  Disk3, 45848,
  203.                         (delmarkv.ex_, delmarkv.fi_)
  204.  
  205. MarkVisionUninstall = $Str_MarkVisionUninstall, , $TRUESYSTEMDIR, Disk3, 206089,
  206.                         (delmarkv.ex_, delmarkv.fi_)
  207.  
  208. MarkVisThunk = $Str_MarkVision, , $TRUESYSTEMDIR, Disk3, 213152,
  209.                 (ptapiw32.dl_, ptguiw32.dl_, ptresw32.dl_, ptthk16.dl_, ptthk32.dl_, common.dl_ )
  210.  
  211. ServerMarkVisionThunk = $Str_MarkVision, , $SERVERDIR, Disk3, 115452,
  212.                 (ptapiw32.dl_, ptguiw32.dl_, ptresw32.dl_, ptthk16.dl_, ptthk32.dl_, common.dl_ )
  213.  
  214. ;TODO HELP - uncomment the next 2 lines when Fujitsu help is ready, fix file size
  215. MarkVisionNetUI = $Str_MarkVision, , $APPDIR, Disk4, 703488,
  216.         (lexnetui.dl_, Fj_netui.hl_, Fj_netui.cn_, netuires.dl_ )
  217.  
  218. ;TODO HELP - uncomment the next 2 lines when Fujitsu help is ready, fix file size
  219. ServerMarkVisionNetUI = $Str_MarkVision, , $SERVERDIR, Disk4, 255493,
  220.         (lexnetui.dl_, Fj_netui.hl_, Fj_netui.cn_, netuires.dl_ )
  221.  
  222.  
  223. ServerSounds = $Str_MarkVisionWaves, , $SERVERDIR, Disk4, 500862,
  224.                         (fujitsu.ps_,
  225.                          cdcf.wa_,  cpef.wa_, cpf.wa_,   cpjf.wa_, lpef.wa_, obff.wa_,
  226.                          pnuif.wa_, dff.wa_,  mff.wa_,   spf.wa_,  asf.wa_,   olf.wa_,  idof.wa_,  tehpf.wa_,
  227.                          bcef.wa_,  bcmf.wa_, ccef.wa_,  ccmf.wa_, mcef.wa_,  mcmf.wa_, ycef.wa_,  ycmf.wa_,
  228.                          obef.wa_,  wbmf.wa_, wbff.wa_,  bclf.wa_, obmf.wa_,  cclf.wa_, mclf.wa_,  yclf.wa_,
  229.                          vc9.wa_,   vc14.wa_, vc26.wa_,  vc35.wa_, vc6.wa_,
  230.                          vc36.wa_,  vc37.wa_, vc38.wa_,  vc50.wa_, vc60.wa_,  vc41.wa_)
  231.  
  232. MarkVisionWaves = $Str_MarkVisionWaves, , $APPDIR, Disk4, 638808,
  233.                         (fujitsu.ps_,
  234.                          cdcf.wa_,  cpef.wa_, cpf.wa_,   cpjf.wa_, lpef.wa_, obff.wa_,
  235.                          pnuif.wa_, dff.wa_,  mff.wa_,   spf.wa_,  asf.wa_,   olf.wa_,  idof.wa_,  tehpf.wa_,
  236.                          bcef.wa_,  bcmf.wa_, ccef.wa_,  ccmf.wa_, mcef.wa_,  mcmf.wa_, ycef.wa_,  ycmf.wa_,
  237.                          obef.wa_,  wbmf.wa_, wbff.wa_,  bclf.wa_, obmf.wa_,  cclf.wa_, mclf.wa_,  yclf.wa_,
  238.                          vc9.wa_,   vc14.wa_, vc26.wa_,  vc35.wa_, vc6.wa_,
  239.                          vc36.wa_,  vc37.wa_, vc38.wa_,  vc50.wa_, vc60.wa_,  vc41.wa_)
  240.  
  241. ; // Not sure why this is here
  242. ;MarkVisionLLNet = $Str_MarkVisionLLNet, , $TRUESYSTEMDIR, Disk4, 83456,        
  243. ;                 (lexll32.dl_)
  244.  
  245. MarkVisionTCPIP =  $Str_MarkVisionTCPIP, , $TRUESYSTEMDIR, Disk4, 85504,
  246.                  (lexip32.dl_)
  247.  
  248. MarkVisionNetWare =  $Str_MarkVisionNetWare, , $TRUESYSTEMDIR, Disk4, 450560,
  249.                  (lexnw32.dl_, lexnwthk.dl_, nwcalls.dl_, nwipxspx.dl_, nwlocale.dl_, nwnet.dl_, nwpsrv.dl_ )
  250.  
  251. ServerNetworks = $Str_MarkVisionLLNet, , $SERVERDIR, Disk4, 444601,
  252. ;                 (lexll32.dl_,  lexip32.dl_, lexipx32.dl_
  253.                  (lexip32.dl_, lexpps.ex_, lexp2p32.dl_,
  254.                   lexnw32.dl_, lexnwthk.dl_, nwcalls.dl_, nwipxspx.dl_, nwlocale.dl_, nwnet.dl_, nwpsrv.dl_ )
  255.  
  256. AppNetWorks = $Str_MarkVisionLLNet, , $TRUESYSTEMDIR, Disk4, 799232,
  257. ;                 (lexpps.ex_, lexp2p32.dl_, lexll32.dl_,  lexip32.dl_, lexipx32.dl_,
  258.                  (lexpps.ex_, lexp2p32.dl_, lexip32.dl_ ,
  259.                   lexnw32.dl_, lexnwthk.dl_, nwcalls.dl_, nwipxspx.dl_, nwlocale.dl_, nwnet.dl_, nwpsrv.dl_ )
  260.  
  261. AppNetWorksRemoteMV = $Str_MarkVisionLLNet, , $TRUESYSTEMDIR, Disk4, 799232,
  262.                  (lexpps.exe, lexp2p32.dll, lexip32.dll ,
  263.                   lexnw32.dll, lexnwthk.dll, nwcalls.dll, nwipxspx.dll, nwlocale.dll, nwnet.dll, nwpsrv.dll )
  264.  
  265.  
  266.  
  267.  
  268.  
  269.  
  270. [ServerProducts]
  271. RemoteMV_Misc_Server = "P"
  272.  
  273.  
  274. [Macros]
  275.  
  276. ; InstallProgmanGroup:    Creates a Program Manager group for MarkVision.
  277. ;                                Return value is empty (we use the return value
  278. ;                                for a temporary string.)
  279. ;
  280. InstallProgmanGroup()
  281.     (
  282.  
  283.  
  284.  
  285.     MakePathName($InstallProgmanGroup, , $APPDIR, $Exe_MarkVision)
  286. ; create MarkVision Group and Item
  287.     IfEqual($INSTALLMODE, "E",
  288.         CallLibrary(MVUtility, CreateProgmanItem, , ($Str_MarkVision,
  289.                         $Str_MarkVision, $InstallProgmanGroup, $NO)),
  290.         CallLibrary(MVUtility, CreateProgmanItem, , ($Str_MarkVision,
  291.                         $Str_MarkVision, $InstallProgmanGroup, $NO,
  292.                         $Str_Prompt_ProgmanTitle, $Str_Prompt_ProgmanMsg,
  293.                         $HelpID_MVCreateItem)))
  294.  
  295.  
  296.  
  297.         IfEqual($INSTALLMODE, "S",
  298.         CallLibrary(MVUtility, CreateProgmanItem, , ($Str_MarkVision,
  299.                         $Str_MarkVision, $InstallProgmanGroup, $NO)),
  300.         CallLibrary(MVUtility, CreateProgmanItem, , ($Str_MarkVision,
  301.                         $Str_MarkVision, $InstallProgmanGroup, $NO,
  302.                         $Str_Prompt_ProgmanTitle, $Str_Prompt_ProgmanMsg,
  303.                         $HelpID_MVCreateItem)))
  304.  
  305.  
  306.  
  307.     IfEqual($INSTALLMODE, "S", NOP(),
  308.                 CallLibrary(MVShellExt, CreateShortCut, , ($InstallProgmanGroup, $Str_MarkVision)))
  309.  
  310.  
  311.     ; Add MarkVision to the StartUp group?
  312.     IfEqual($Install_StartupGroup, "",
  313.         ChooseYesNo($Install_StartupGroup, $Str_Prompt_AutoMarkVision, $YES,
  314.                         $HelpID_MVStartUpGroup))
  315.  
  316.     ; Create the item in the StartUp group
  317.     IfEqual($Install_StartupGroup, $YES,
  318.         CallLibrary(MVUtility, CreateProgmanItem, , ("StartUp",
  319.             $Str_MarkVision, $InstallProgmanGroup, $YES)))
  320.  
  321.  
  322.     )
  323.  
  324. SetToDoOnStartup()
  325.    (
  326.         MakePathName($ExecutablePath, , $APPDIR, $Exe_MarkVision)
  327.  
  328.         SetVariable ($REG_KEY,$REG_START)
  329.         CallLibrary(MVUtility, CreateRegistryKey, , ($HKLM,$REG_KEY))
  330.  
  331.         SetVariable($REG_VALUE_NAME,"MarkVision")
  332.         SetVariable($REG_VALUE, $ExecutablePath)
  333.         CallLibrary(MVUtility, SetRegistryKeyValue, , ($HKLM,$REG_KEY,"REG_SZ",$REG_VALUE_NAME,$REG_VALUE))
  334.  
  335.    )
  336.  
  337. ; CustomDirectory:    Called from "Custom Installation" window when user
  338. ;                            presses the <Directories> button.
  339. ;
  340. CustomDirectory()
  341.     (
  342.     ; Pick an installation directory
  343.     ChoosePath($APPDIR, $Str_Prompt_ChooseDir, $APPDIR,
  344.                 $HelpID_ChooseMarkVisionDir)
  345.  
  346.     )
  347.  
  348.  
  349.  
  350.  
  351.  
  352.  
  353.  
  354.  
  355. ; FinishRemoteMVInstall:    Performs remote installation duties not
  356. ;                               handled  by InstallMarkVision().
  357. ;
  358. FinishRemoteMVInstall()
  359.     (
  360.     ; Copy the remotemv.rsp file into the MarkVision dir as cmdline.rsp
  361.         SetVariable ($TempServerAppDir, ($SERVERDIR, "\\", $SERVERAPPDIR))
  362.         MakePathName($FinishRemoteMVInstall, , $TempServerAppDir, "cmdline.rsp")
  363.         MakePathName($TempString, ,$SCRIPTDIR, "remotemv.rsp")
  364.  
  365.         CopyFile($TempString, $FinishRemoteMVInstall)
  366.         SetVariable ($TempServerAppDir, "")
  367.         SetVariable ($TempString, "")
  368.     )
  369.  
  370.  
  371.  
  372.  
  373.  
  374.  
  375.  
  376.  
  377.  
  378. ; StripFilename:    This function returns a string representing the given
  379. ;                        path without the filename information.
  380. ;
  381. StripFilename($fn)
  382.     (
  383.     ; First, split the path into the drive, path, and filename.  We discard
  384.     ; the filename, store the drive in a global temporary string, and
  385.     ; store the path in $StripFilename.
  386.     SplitPath($fn, $StripFilename_Drive, $StripFilename, )
  387.  
  388.     ; Now recombine the drive and filename, storing them in the return string.
  389.     SetVariable($StripFilename, ($StripFilename_Drive, $StripFilename))
  390.     )
  391.  
  392.  
  393.  
  394. ; MakeDefaultAppDir:    This function $APPDIR to its default value.  It also
  395. ;                            sets the value of $LexpanelINI.
  396. ;                            The return value is the drive from the $TEMPDIR variable.
  397. ;
  398. MakeDefaultAppDir()
  399.     (
  400.  
  401.     ; Find the drive that stores this temporary directory
  402.     SplitPath($TEMPDIR, $MakeDefaultAppDir, , )
  403.  
  404.     ; Make a MarkVision directory on this drive
  405.         MakePathName($APPDIR, $MakeDefaultAppDir, "\\Markvis\\Win95", )
  406.  
  407.     ; Since we have messed with the app directory, might as well set the
  408.     ; name of the MarkVision INI file too...
  409.     MakePathName($LexpanelINI, , $APPDIR, "lexpanel.ini")
  410.     )
  411.  
  412.  
  413.  
  414.  
  415. ; Initialize:    Called before any other macros are run and before any
  416. ;                    GUI stuff is shown.
  417. ;                    The return value is meaningless (used as a temporary string.)
  418. ;
  419. Initialize()
  420.     (
  421.         CallMacro(MakeDefaultAppDir,,)
  422.  
  423.  
  424.     IfEqual($Initialize, $NO, SetVariable($Install_MarkVision, $NO))
  425.     )
  426.  
  427.  
  428.  
  429. InstRemoteMVFromMV()
  430.    (
  431.    CallMacro(InstallRemoteMarkVision, , "")
  432.    )
  433.  
  434. InstallRemoteFiles()
  435. (
  436.         MakePathName($RemoteMarkVisionDir, , $SERVERDIR, $DirName_RemoteMV)
  437.         InstallComponent (RemoteMV_Misc_Server)
  438. )
  439.  
  440. ; Entry point when the script is run independently.
  441. ;
  442. InstallRemoteMarkVision($cmdline)
  443.     (
  444.  
  445.         SetVariable ($INSTALLMODE, "C")
  446.     ; For remote MarkVision, temporarily set the directories to
  447.     ; reference our new MarkVision dir
  448.         MakePathName($RemoteMarkVisionDir, , $SERVERDIR, $DirName_RemoteMV)
  449.         SetVariable($TempAppDir, $APPDIR)
  450.         SetVariable($APPDIR, $SCRIPTDIR)
  451.  
  452.  
  453.         SetVariable ($TempString, $APPDIR)
  454.  
  455.  
  456.         CallLibrary (MVUtility, UpdatePathInAutoExec,,$TempString)
  457.  
  458.  
  459.         CallMacro (ConfigureRemoteMarkVision, ,)
  460.  
  461.         ; Now pretend we installed Markvision so the registry etc can be
  462.         ; updated per normal and reboot on the local machine forced
  463.         SetVariable ($Install_MarkVision, $YES);
  464.  
  465.         CallMacro (ConfigureMarkVision, , $WINDOWSDIR)
  466.  
  467.         CallMacro (SetReboot,,)
  468.  
  469.         ; Restore $APPDIR and $SERVERAPPDIR
  470.         SetVariable($APPDIR, $TempAppDir)
  471.         SetVariable($SERVERAPPDIR, $TempServerAppDir)
  472.         )
  473.  
  474. ConfigureRemoteMarkVision()
  475. (
  476.         ShowMessage ("Configuring Remote MarkVision")
  477.         InstallComponent(LanguageMonitor, , "N")
  478.         InstallComponent(Msvc,,"N")
  479.         InstallComponent(AppNetWorksRemoteMV,,"N")
  480.         CallLibrary (MVUtility, InstallLangMon,,)
  481.         SetVariable ($TempString, $Str_Disk_4)
  482.  
  483. )
  484.  
  485. ; InstallMarkVision:  Install MarkVision files
  486. ;                     Return value ignored (we use the return value as
  487. ;                     a temporary string.)
  488. ;
  489. InstallMarkVision()
  490. (
  491.  
  492.         IfEqual ($INSTALLMODE, "S",
  493.                 IfEqual ($Install_RemoteMV, $YES,
  494.                         SetVariable ($TempAppDir, $TRUESYSTEMDIR)
  495.                         )
  496.                 )
  497.  
  498.         IfEqual ($INSTALLMODE, "S",
  499.                 IfEqual ($Install_RemoteMV, $YES,
  500.                         SetVariable ($TRUESYSTEMDIR, $SERVERAPPDIR)
  501.                         )
  502.                 )
  503.  
  504.  
  505.         SetVariable ($DoMarkVisionReally, $YES)
  506.         SetVariable ($Install_Driver, $YES)
  507.  
  508.         IfEqual ($Install_MarkVision, $YES,
  509.                 SetVariable ($DoMarkVisionReally, $YES)
  510.                 )
  511.  
  512.         ;asks at beginning to install printer drivers
  513.         IfEqual ($INSTALLMODE, "E",
  514.                 IfEqual ($FromWizard, $NO,
  515.                         ChooseYesNo($Install_Driver, $Str_Prompt_Driver, $YES,)
  516.                         )
  517.                 )
  518.  
  519.  
  520.  
  521.         IfEqual ($INSTALLMODE, "E",
  522.                 IfEqual ($FromWizard, $NO,
  523.                         IfEqual ($Install_Driver, $YES,
  524.                                 CallLibrary (MVUtility, CallLoadPrinterWizard,,)
  525.                                 )
  526.                         )
  527.                 )
  528.  
  529.  
  530.         ; Install Markvision
  531.         IfEqual ($FromWizard, $NO,
  532.                 IfEqual ($INSTALLMODE, "E",
  533.                     IfEqual ($Install_Driver, $YES,
  534.                         ChooseYesNo($DoMarkVisionReally, $Str_DoMarkVisionReally, $YES,)
  535.                             )
  536.                         )
  537.                 )
  538.  
  539.         IfEqual ($DoMarkVisionReally, $NO,
  540.                         SetVariable($Install_MarkVision, $NO))
  541.  
  542.         IfEqual ($DoMarkVisionReally, $NO,
  543.                         SetVariable($Install_MarkVisionWaves, $NO))
  544.  
  545. ;        IfEqual ($DoMarkVisionReally, $NO,
  546. ;                        SetVariable($Install_MarkVisionLLNet, $NO))
  547.  
  548.         IfEqual ($DoMarkVisionReally, $NO,
  549.                         SetVariable($Install_MarkVisionTCPIP, $NO))
  550.  
  551.         IfEqual ($DoMarkVisionReally, $NO,
  552.                         SetVariable($Install_MarkVisionP2PClient, $NO))
  553.  
  554.         IfEqual ($DoMarkVisionReally, $NO,
  555.                         SetVariable($Install_MarkVisionP2PServer, $NO))
  556.  
  557. ;        IfEqual ($DoMarkVisionReally, $NO,
  558. ;                        SetVariable($Install_MarkVisionIPX, $NO))
  559.  
  560.         IfEqual ($DoMarkVisionReally, $NO,
  561.                         SetVariable($Install_MarkVisionNetWare, $NO))
  562.  
  563.         IfEqual ($DoMarkVisionReally, $NO,
  564.                         SetVariable($InstallMSVC, $NO))
  565.  
  566.         IfEqual ($DoMarkVisionReally, $NO,
  567.                         SetVariable($Install_Fuji, $NO))
  568.  
  569.         IfEqual ($DoMarkVisionReally, $NO,
  570.                         SetVariable($InstallAggDll, $NO))
  571.  
  572.  
  573.         CreatePath ($APPDIR)
  574.     
  575.         IfEqual ($OLD_MV, $YES,
  576.              SetVariable($Install_MarkVision, $NO))
  577.  
  578.  
  579.  
  580.     ;TODO - test Progress bar for all install types
  581.         IfEqual ($Install_RemoteMV, $NO,
  582.             IfEqual($Install_MarkVision, $YES,
  583.                  AddProgress(MvPrtGuiDLL)))
  584.         IfEqual ($Install_RemoteMV, $NO,
  585.             IfEqual($Install_MarkVision, $YES,
  586.                  AddProgress(MarkVisThunk)))
  587.         IfEqual ($Install_RemoteMV, $NO,
  588.             IfEqual($Install_MarkVision, $YES,
  589.                  AddProgress(MarkVisionNetUI)))
  590.         IfEqual ($Install_RemoteMV, $NO,
  591.             IfEqual($Install_MarkVision, $YES,
  592.                  AddProgress(MarkVisionHelp)))
  593.  
  594.  
  595.         ; Install MarkVision
  596.         IfEqual ($Install_RemoteMV, $NO,
  597.             IfEqual($Install_MarkVision, $YES,
  598.                     InstallComponent(Msvc, , "N"))
  599.             )
  600.         IfEqual ($Install_RemoteMV, $YES,
  601.                     InstallComponent(Msvc, , "S"))
  602.  
  603.         IfEqual($Install_RemoteMV,$YES,
  604.                 IfEqual ($Install_MarkVision, $YES,
  605.                         InstallComponent(LanguageMonitorNC, , "S")                      )
  606.                 )
  607.  
  608.         IfEqual($INSTALLMODE,"S", NOP(),
  609.                 IfEqual ($Install_MarkVision, $YES,
  610.                         InstallComponent(LanguageMonitor, , "N")
  611.                     )
  612.                 )
  613.  
  614.  
  615.  
  616.         IfEqual ($Install_MarkVision, $YES,
  617.                 InstallComponent(MarkVision, , "N"))
  618.  
  619.         IfEqual ($Install_MarkVision, $YES,
  620.                 InstallComponent(MarkVisionHelp, , "N"))
  621.  
  622.         IfEqual ($OLD_MV, $YES,
  623.                 InstallComponent(MarkVisionHelp, , "N"))
  624.  
  625.  
  626.         ;this is here simply to set the disk to disk4 if it is not already there, this dll shouldn't
  627.         ;change between releases now, so it is okay to install all the time
  628.         
  629.         IfEqual($InstallAggDll, $YES,
  630.                 InstallComponent(AggDll,,"N"))
  631.  
  632.  
  633.     ;check dll's here, if same, return yes
  634.     IfEqual ($OLD_MV, $YES,
  635.         MakePathName($DLLDIR_INSTALLING, , $APPDIR, "mvprtgui.dll" ))
  636.     IfEqual ($OLD_MV, $YES,
  637.         GetINI("DLLVersion", $DLLDIR_INSTALLING, "mvprtgui.dll", $REG_SAMEDLL))
  638.  
  639.  
  640.  
  641.         IfEqual ($REG_SAMEDLL, "D",
  642.             SetVariable($Install_Fuji, $NO))
  643.  
  644.         IfEqual ($Install_Fuji, $YES,
  645.                 InstallComponent(FujiMarkVision, , "N"))
  646.  
  647.         IfEqual ($Install_MarkVision, $YES,
  648.                 InstallComponent(MvPrtGuiDLL, , "N"))
  649.  
  650.         IfEqual($Install_MarkVisionP2PServer, $YES,
  651.                InstallComponent(MarkVisionP2PServer, , "N"))
  652.  
  653.         IfEqual($Install_MarkVisionP2PClient, $YES,
  654.                 InstallComponent(MarkVisionP2PClient, , "N"))
  655.  
  656.         IfEqual ($Install_MarkVision, $YES,
  657.                 InstallComponent(MarkVisThunk, , "N"))
  658.  
  659.         IfEqual ($Install_MarkVision, $YES,
  660.                 InstallComponent(MarkVisionNetUI, , "N"))
  661.         
  662.         IfEqual($Install_MarkVisionWaves, $YES,
  663.                 InstallComponent(MarkVisionWaves, , "N"))
  664.  
  665.         IfEqual($Install_RemoteMV, $YES,
  666.                 InstallComponent(AppNetWorks, ,"N"))
  667.  
  668. ;        IfEqual($Install_MarkVisionLLNet, $YES,
  669. ;                InstallComponent(MarkVisionLLNet, , "N"))
  670.  
  671.         IfEqual($Install_MarkVisionNetWare, $YES,
  672.                 InstallComponent(MarkVisionNetWare, , "N"))
  673.     
  674.         IfEqual($Install_MarkVisionTCPIP, $YES,
  675.                 InstallComponent(MarkVisionTCPIP, , "N"))
  676.  
  677. ;        IfEqual($Install_MarkVisionIPX, $YES,
  678. ;                InstallComponent(MarkVisionIPX, , "N"))
  679.  
  680.  
  681.         IfEqual($Install_RemoteMV, $YES,
  682.                 CallMacro(FinishRemoteMVInstall,,),
  683.                 CallMacro(ConfigureMarkVision,, $APPDIR)
  684.                 )
  685.  
  686.  
  687.         IfEqual ($Install_RemoteMV, $YES, SetVariable ($INSTALLMODE, "S"))
  688.  
  689.         IfEqual ($INSTALLMODE, "S",
  690.                 IfEqual ($Install_RemoteMV, $YES,
  691.                 SetVariable ($TRUESYSTEMDIR, $TempAppDir))
  692.                 )
  693.  
  694.         IfEqual ($INSTALLMODE, "S",NOP(),
  695.                 CallMacro (InvokePrinterWizard,,)
  696.                 )
  697.  
  698.  
  699.  
  700.         IfEqual ($DEBUG, $YES,
  701.                 ShowMessage("Attempting to Set Up Language Monitor")
  702.                 )
  703.  
  704.         IfEqual ($INSTALLMODE, "S",NOP(),
  705.                 IfEqual ($Install_MarkVision, $YES,
  706.                         CallLibrary (MVUtility, InstallLangMon,,)
  707.                         )
  708.                 )
  709.  
  710.         IfEqual ($DEBUG, $YES,
  711.                 ShowMessage("Successfully Set up Language Monitor")
  712.                 )
  713.  
  714.         IfEqual ($INSTALLMODE, "S",NOP(),
  715.                 CallLibrary (MVUtility, RemoveAutoExecString,,))
  716.  
  717.         IfEqual ($DEBUG, $YES,
  718.                 ShowMessage("After RemoveAutoexecString")
  719.                 )
  720.         IfEqual ($INSTALLMODE, "S",NOP(),
  721.                 CallMacro (SetReboot,,)
  722.                 )
  723.  
  724. ; save our settings so successive custom installs will check only
  725. ; what has not been already installed
  726.  
  727.  
  728.         IfEqual($INSTALLMODE, "S", NOP(),
  729.                 IfEqual($Install_MarkVision, $YES,
  730.                         SetVariable($Install_MarkVision, $NO),
  731.                         SetVariable($Install_MarkVision, $YES))
  732.                         )
  733.  
  734.         IfEqual($INSTALLMODE, "S", NOP(),
  735.                                 IfEqual($InstallMSVC, $YES,
  736.                                                 SetVariable($InstallMSVC, $YES),
  737.                                                 SetVariable($InstallMSVC, $YES))
  738.                         )
  739.  
  740.         IfEqual($INSTALLMODE, "S", NOP(),
  741.                 IfEqual($Install_MarkVisionWaves, $YES,
  742.                         SetVariable($Install_MarkVisionWaves, $NO),
  743.                         SetVariable($Install_MarkVisionWaves, $YES))
  744.                         )
  745.  
  746.  
  747. ;        IfEqual($Install_MarkVisionLLNet, $NO,
  748. ;                SetVariable($Install_MarkVisionLLNet, $YES),
  749. ;                SetVariable($Install_MarkVisionLLNet, $NO))
  750.  
  751.         IfEqual($Install_MarkVisionP2PServer, $YES,
  752.                 SetVariable($Install_MarkVisionP2PServer, $NO),
  753.                 SetVariable($Install_MarkVisionP2PServer, $YES))
  754.  
  755.         IfEqual($Install_MarkVisionNetWare, $NO,
  756.                 SetVariable($Install_MarkVisionNetWare, $YES),
  757.                 SetVariable($Install_MarkVisionNetWare, $NO))
  758.  
  759.         IfEqual($Install_MarkVisionTCPIP, $NO,
  760.                 SetVariable($Install_MarkVisionTCPIP, $YES),
  761.                 SetVariable($Install_MarkVisionTCPIP, $NO))
  762.  
  763. ;        IfEqual($Install_MarkVisionIPX, $NO,
  764. ;                SetVariable($Install_MarkVisionIPX, $YES),
  765. ;                SetVariable($Install_MarkVisionIPX, $NO))
  766.  
  767.         IfEqual($Install_MarkVisionP2PClient, $YES,
  768.                 SetVariable($Install_MarkVisionP2PClient, $NO),
  769.                 SetVariable($Install_MarkVisionP2PClient, $YES))
  770.  
  771.         SetVariable ($FromWizard, $NO)
  772.  
  773.         SetVariable ($DoMarkVisionReally, $YES)
  774.         SetVariable ($Install_Fuji, $YES)
  775.         SetVariable ($REG_SAMEDLL, $YES)
  776.  
  777.  
  778.  
  779.         IfEqual($INSTALLMODE, "S", NOP(),
  780.                 IfEqual($REG_SAMEDLL, $YES,
  781.                         SetVariable($REG_SAMEDLL, $NO),
  782.                         SetVariable($REG_SAMEDLL, $YES))
  783.                         )
  784.  
  785.         IfEqual($INSTALLMODE, "S", NOP(),
  786.                 IfEqual($InstallAggDll, $YES,
  787.                         SetVariable($InstallAggDll, $NO),
  788.                         SetVariable($InstallAggDll, $YES))
  789.                         )
  790.  
  791.     )
  792.  
  793.  
  794.  
  795. ; ConfigureMarkVision:    Sets up INI files, etc..., so that the installed
  796. ;                                MarkVision is actually runnable.
  797. ;                                $IniFileDir points to the directory that holds the
  798. ;                                lexpanel.ini file.
  799. ;
  800. ConfigureMarkVision($IniFileDir)
  801.     (
  802.     SetVariable($ConfigureMarkVision, ($ConfigureMarkVision, " -w"))
  803.  
  804.  
  805.     ;Do the registry stuff
  806.     IfEqual($Install_MarkVision, $YES,
  807.                ShowMessage($Str_Message_Registry))
  808.     IfEqual($Install_MarkVision, $YES,
  809.                 CallMacro(MarkvisionRegistry,,))
  810.     IfEqual($Install_MarkVision, $YES,
  811.                 ShowMessage(" "))
  812.  
  813.     IfEqual ($DEBUG, $YES,
  814.         ShowMessage ("Attempting to do program manager stuff")
  815.         )
  816.     ; Make a Program Manager group?
  817.     IfEqual($Install_MarkVision, $YES,
  818.             CallMacro(InstallProgmanGroup,,))
  819.  
  820.  
  821.     IfEqual ($DEBUG, $YES,
  822.             ShowMessage ("Did the program Manager Stuff")
  823.             )
  824.     )
  825.  
  826. SetReboot() (
  827.  
  828.     ; In order for bi-di to work, we need to restart Windows
  829.     IfEqual($INSTALLMODE,"S", NOP(),
  830.             IfEqual($Install_MarkVision, $YES,
  831.                     SetRebootFlag()))
  832.     IfEqual($INSTALLMODE,"S", NOP(),
  833.             IfEqual($Install_Fuji, $YES,
  834.                     SetRebootFlag()))
  835.  
  836. )
  837.  
  838.  
  839. InvokePrinterWizard()
  840.    (
  841.  
  842.    IfEqual ($DEBUG, $YES,
  843.         ShowMessage("Invoking The Printer Wizard")
  844.         )
  845.  
  846.    IfEqual ($INSTALLMODE, "S", SetVariable ($Install_AdditionalDrivers, "N"),
  847.         IfEqual($Install_AdditionalDrivers, "",
  848.            ChooseYesNo($Install_AdditionalDrivers, $Str_Prompt_AdditionalDrivers, $YES,
  849.                                                 )))
  850.     IfEqual($Install_AdditionalDrivers, $YES,
  851.         CallLibrary (MVUtility, CallLoadPrinterWizard,,))
  852.  
  853.  
  854.  
  855.         IfEqual ($DEBUG, $YES,
  856.                 ShowMessage ("Finished with the Printer Wizard")
  857.                 )
  858.    )
  859.  
  860.  
  861.